package com.xbongbong.paas.toolbox.util;

import com.xbongbong.paas.toolbox.exception.XbbException;
import com.xbongbong.pro.enums.ErrorCodeEnum;
import com.xbongbong.pro.enums.errorcodes.BusinessRuleErrorCodeEnum;
import org.apache.commons.lang3.StringUtils;

import java.util.Objects;

/**
 * 公式相关方法，从吴峰相关方法内抽入
 * 比如，OperatorUpperMoney
 * @author zcp
 * @version v1.0
 * @since v1.0
 */
public class FormulaUtil {

    /**
     *大写数字
     */
    private static final String[] NUMBERS = {"零","壹","贰","叁","肆","伍","陆","柒","捌","玖"};
    /**
     * 整数部分的单位
     *
     */
    private static final String[] IUNIT = {"元","拾","佰","仟","万","拾","佰","仟","亿","拾","佰","仟","万","拾","佰","仟"};
    /**
     * 小数部分的单位
     *
     */
    private static final String[] DUNIT = {"角","分","厘"};

    /**
     *  转换为大写的中文金额
     * @param object 对象类型的 金额数字
     * @author wufeng
     * @return
     * @update 从OperatorUpperMoney内移入该util内，方便外部其他地方使用 by zcp
     */
    public static String upperMoneyToChinese(Object object) throws XbbException {
        if (Objects.isNull(object)) {
            throw new XbbException(BusinessRuleErrorCodeEnum.API_ERROR_261027);
        }
        String str = object.toString();
        // 判断输入的金额字符串是否符合要求
        if (StringUtils.isBlank(str)) {
            throw new XbbException(BusinessRuleErrorCodeEnum.API_ERROR_261027);
        }
        // 去掉金额数字中的逗号","
        str = str.replaceAll(",", "");
        boolean isNumber = RegexUtil.isNumber(str);
        if (!isNumber) {
            throw new XbbException(BusinessRuleErrorCodeEnum.API_ERROR_261027);
        }

        if("0".equals(str) || "0.00".equals(str) || "0.0".equals(str)) {
            return "零元";
        }

        // 判断金额数字中是否存在负号"-"
        boolean flag = false;
        if(str.startsWith("-")){
            // 标志位，标志此金额数字为负数
            flag = true;
            str = str.replaceAll("-", "");
        }

        String integerStr;//整数部分数字
        String decimalStr;//小数部分数字

        // 初始化：分离整数部分和小数部分
        if(str.indexOf(".")>0) {
            integerStr = str.substring(0,str.indexOf("."));
            decimalStr = str.substring(str.indexOf(".") + 1);
        }else if(str.indexOf(".")==0) {
            integerStr = "";
            decimalStr = str.substring(1);
        }else {
            integerStr = str;
            decimalStr = "";
        }

        // beyond超出计算能力，直接返回
        if(integerStr.length()>IUNIT.length) {
            throw new XbbException(BusinessRuleErrorCodeEnum.API_ERROR_261027);
        }

        // 整数部分数字
        int[] integers = toIntArray(integerStr);
        // 判断整数部分是否存在输入012的情况
        if (integers.length>1 && integers[0] == 0) {
            throw new XbbException(BusinessRuleErrorCodeEnum.API_ERROR_261027);
        }
        // 设置万单位
        boolean isWan = isWan5(integerStr);
        // 小数部分数字
        int[] decimals = toIntArray(decimalStr);
        // 返回最终的大写金额
        String result = getChineseInteger(integers, isWan) + getChineseDecimal(decimals);
        if(flag){
            // 如果是负数，加上"负"
            return "负" + result;
        }else{
            return result;
        }
    }
    /**
     *  将字符串转为int数组
     * @param number  数字
     * @return
     */
    private static int[] toIntArray(String number) {
        int[] array = new int[number.length()];
        for(int i = 0;i<number.length();i++) {
            array[i] = Integer.parseInt(number.substring(i,i+1));
        }
        return array;
    }

    /**
     *  将整数部分转为大写的金额
     * @param integers 整数部分数字
     * @param isWan  整数部分是否已经是达到【万】
     * @return
     */
    private static String getChineseInteger(int[] integers,boolean isWan) {
        StringBuffer chineseInteger = new StringBuffer("");
        int length = integers.length;
        if (length == 1 && integers[0] == 0) {
            return "";
        }
        for(int i=0; i<length; i++) {
            String key = "";
            if(integers[i] == 0) {
                if ((length - i) == 13) {
                    //万（亿）
                    key = IUNIT[4];
                } else if((length - i) == 9) {
                    //亿
                    key = IUNIT[8];
                }else if((length - i) == 5 && isWan) {
                    //万
                    key = IUNIT[4];
                }else if((length - i) == 1) {
                    //元
                    key = IUNIT[0];
                }
                if((length - i)>1 && integers[i+1]!=0) {
                    key += NUMBERS[0];
                }
            }
            chineseInteger.append(integers[i]==0?key:(NUMBERS[integers[i]]+IUNIT[length - i -1]));
        }
        return chineseInteger.toString();
    }

    /**
     *  将小数部分转为大写的金额
     * @param decimals 小数部分的数字
     * @return
     */
    private static String getChineseDecimal(int[] decimals) {
        if (decimals.length == 0) {
            return "整";
        }
        StringBuffer chineseDecimal = new StringBuffer("");
        for(int i = 0;i<decimals.length;i++) {
            if(i == 3) {
                break;
            }
            chineseDecimal.append(decimals[i]==0?"":(NUMBERS[decimals[i]]+DUNIT[i]));
        }
        return chineseDecimal.toString();
    }

    /**
     *  判断当前整数部分是否已经是达到【万】
     * @param integerStr  整数部分数字
     * @return
     */
    private static boolean isWan5(String integerStr) {
        int length = integerStr.length();
        if(length > 4) {
            String subInteger = "";
            if(length > 8) {
                subInteger = integerStr.substring(length- 8,length -4);
            }else {
                subInteger = integerStr.substring(0,length - 4);
            }
            return Integer.parseInt(subInteger) > 0;
        }else {
            return false;
        }
    }
}
